10 REM LOCK UP LOCATOR
20 FORX=53199TO53247:READA:B=B+A:POKEX,A:NEXT
30 IFB<>6795THENPRINT"ERROR IN DATA. TRY AGAIN.":END
40 PRINT"[147] **** LOCK UP LOCATOR INSTALLED   ****"
50 PRINT" **** SYS 53199 TO ACTIVATE,      ****"
60 PRINT" **** PRESS '_' TO TRIGGER, AND   ****"
70 PRINT" **** SYS 53236 FOR A REPORT.     ****"
80 DATA 120,169,207,141,21,3,169,220,141,20,3,88,96,165,197,201,57,240,3,76
90 DATA 49,234,104,104,104,104,104,141,254,207,104,141,255,207,76,226,252,173
100 DATA 255,207,174,254,207,32,205,189,96,0,0